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FOREWORD 


This  final  report  presents  an  outline  of  the  steps  required  to  successfully 
execute  the  Generalized  Escape  System  Simulation  Computer  Program.  The 
program  was  developed  to  allow  the  simulation  and  analysis  of  numerous 
ejection  seats  under  various  ejection  conditions.  A  complete  listing  of  the 
program  source  code  is  not  included  in  this  report  because  such  a  listing 
would  be  several  hundred  pages  long.  However,  a  printout  and  a  copy  of  the 
program  may  be  obtained  by  contacting  the  author  at  J1ADC. 

A  portion  of  the  work  contained  in  this  report  was  performed  by  Computer 
Sciences  Corporation  in  accordance  with  Task  Order  46,  "Escape  System  Ejection 
Seat  Simulation  and  Analysis",  issued  under  contract  N’62269-78-C-0191 . 
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I.  INTRODUCTION 

This  manual  is  a  guide  to  running  the  Generalized  Escape  System 
Simulation  (GESS)  Program.  The  following  is  a  list  of  the  segments 
needed  to  complete  a  successful  run  of  this  program.  These  segments 
must  be  exercised  in  the  order  listed  below: 

1.  Creating  the  Aerodynamic  Coefficient  Tables  (via  the  ACT 
Program) . 

2.  Build  a  GESS  Input  File 

3.  Execute  the  GESS  Program 

4.  Run  Utilities  on  the  Plotting  File  (Optional) 

5.  Re-run  the  GESS  Program  (Optional) 

Each  section  of  this  manual  describes  one  of  the  above  segments.  Any 
steps  to  be  performed  within  each  segment  must  be  done  in  the  order  in 
which  they  are  described  within  the  corresponding  section. 

It  will  be  assumed  in  this  User's  Manual  that  the. reader/user  is 
familiar  with  the  NADC  Central  Computer  System  and  the  KRONQS  Operating 
System.  If  particular  questions  arise  refer  to  references  1  and  2. 

The  GESS  Program  System  was  written  to  simulate  ejection  seat  escape 
systems.  The  program  generates  various  trajectories  of  escape  system 
components  and  personnel -by  means  Of"  mathematical  modeling.  'This 
program  was  written  in  a  general  sense  to  simulate  a  number  of  ejection 
seat  escape  systems.  The  program  is  a  digital  simulation  designed 
to  run  on  a  Control  Data  6600/Cyber  Series  Computer.  The  programming 
i  language  used  was  Fortran  Extended  Version  4.  The  program  requires 
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an  input  data  file  and  random  files  of  Aerodynamic  Data  (see  Appendix  D) . 
Output  reports  and  plotting  files  are  generated  by  the  GESS  Program. 

Several  naming  conventions  were  used  to  identify  variables  and  how  they 
were  used  in  the  program.  Refer  to  Appendix  A  for  a  specific  variable 
description.  These  naming  schedules  are  listed  below: 

SA  -  Variables  with  this  suffix  can  relate  to  "Seat  Alone"  activities. 

OA  -  Variables  with  this  suffix  can  relate  to  "Occupant  Alone" 

activities. 

SO  -  Variables  with  this  suffix  can  relate  to  "Seat  Occupant” 
activities. 

NPTS  -  Variables  containing  this  can  contain  a  '’Number  of  Points"  for 
indexing  etc. 

KK  -  Variables  with  this  prefix  can  relate  to  "Rocket"  values. 

NGHT  -  Variables  containing  this  can  contain  a  "Weight”  value - 

X  -  Variables  with  this  prefix  can  relate  to  the  "X"  axis, 

y  -  variables  with  this  prefix  can  relate  to  the  "Y"  axis. 

Z  -  Variables  with  this  prefix  can  relate  to  the  "Z”  axis. 

L  -  Variables  with  this  suffix  can  relate  to  a  "Left"  side. 

R  -  Variables  with  this  suffix  can  relate  to  a  "Right"  side. 

VEL  -  Variables  with  this  can  contain  a  "Velocity"  value. 

PORO  -  Variables  with  this  can  contain  a  "Porosity"  value. 

REC  -  Variables  with  this  prefix  can  relate  to  the  "Recovery”  chute. 

DRO/DR  -  Variables  with  either  of  these  prefixes  can  relate  to  the 

"Drogue"  chute. 

DR T  -  Variables  with  this  can  relate  to  "Dart"  values. 

i 

* 
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POS  -  Variables  with  this  can  relate  to  "Position"  values. 
IGN  -  Variables  with  this  can  relate  to  "Ignition"  values. 
CAT  -  Variables  with  this  can  relate  to  "Catapult”  values. 
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II.  A.  BUILDING  THE  CESS  PROGRAM  INPUT  FILE 

Prior  to  running  the  GESS  Program,  an  eighty  column  card  image  input  file 
must  be  created.  This  file  is  divided  into  s tart/stop  cards,  a  three 
line  header  and  fourteen  data  sections  (in  this  order} .  Appendix  A 
contains  an  alphabetical  list  of  the  variables  by  sections.  This  list 
gives  a  brief  definition  of  each  input  variable,  its  units  of  measurement, 
possible  legal  values  and  the  input  format  (in  order  to  determine  the 
magnitude  of  the  number) .  Appendix  C  is  a  sample  listing  of  a  typical 
input  file. 

The  program  can  be  run  against  several  sets  of  data  without  having  to 
submit  the  job  several  times.  TO  accomplish  this,  a  start  card  is  placed 
at  the  beginning  of  every  input  set  (thus  separating  the  sets) .  A  stop 
card  (or  a  blank  card)  is  placed  at  the  end  (last  card)  of  the  entire 
input  file.  This  card  terminates  the  job. 

The  three  line  header  is  used  bo  identify  the  input  file.  It  is  free 
formatted  and  any  information  can  be  entered.  It  must  be  three  lines 
(or  records)  long.  Blank  records  may  be  inserted  if  necessary. 

The  input  variables  are  divided  into  fourteen  sections.  Sections 
containing  small  arrays  and/or  single  variables  generally  contain  one, 
two,  or  three  fields  per  record  (depending  on  the  layout  of  the 
section) .  The  control  variables  (Section  1)  and  larger  tables  of  data 
such  as  "NPTSCT" ,  for  example,  have  up  to  four  fields  per  record.  A 
field  is  20  columns  in  length  and  this  length,  is  fixed.  The  first  ten 
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columns  describe  the  value  (usually  just  the  variable  name) .  Information 
in  these  ten  columns  can  be  entered  in  free  format,  however,  it  is 
usually  left  justified  for  easier  reading.  Imbedded  spaces  are  used 
when  needed  to  fill  up  the  ten  columns.  The  entire  ten  columns  can  be 
blank  filled  since  the  descriptions  are  optional.  This  half  of  the 
field  is  used  for  entering  the  actual  value.  Integer  numbers  and  floating 
point  numbers  without  a  decimal  point  must  be  right  justified  (refer  to 
Appendix  A  for  each  variable '  s  input  format) .  Floating  point  numbers 
containing  the  decimal  point  can  be  entered  anywhere  within  these  ten 
columns  but  are  usually  right  justified  for  easier  reading.  When 
possible,  these  entries  are  edited  for  legal  values.  Descriptive  error 
messages  are  printed  when  problems  occur.  The  errors  are  depicted  as 
either  fatal  or  warnings.  Warning  ires  sagas  do  not  abort  the  run  and 
default  values  are  substituted  for  the  erroneous  values.  Fatal  errors 
cause  program  termination.  The  input  file  must  be  edited  manually  to 
correct  fatal  errors  before  the  job  can  be  re-run. 

H.  B.  DESCRIPTION  OF  THE  GESS  INPUT  SECTIONS 

The  rules  in  the  previous  paragraphs  are  general  and  pertain  to  all  of  the 
fourteen  input  sections.  Each  input  section  also  has  its  own  unique 
set  of  rules  that  must  "be  strictly  adhered  to.  All  values  must  be 
present  in  the  file  unless  otherwise  specified  in  this  section.  The 
following  chart  (Table  1)  describes  each  of  the  fourteen  input  sections. 
(The  s  tart/s  top  and  header  records  were  described  earlier  but  it  should  be 
noted  that  variable  'DOWHAT'  contains  the  value  for  the  start/stop  record. 


N ADC-3 12 24-60 


The  legal  values  are  'start',  'stop',  or  a  blank  card  inage,  and  the 
data  must  be  left  justified) .  The  sections  must  be  in  the  order  in 
which  they  appear  in  Table  1,  The  sections  are  broken  down  into  records 
(each  line  of  variable  names  represents  one  record) .  The  order  of  the 
records  and  the  order  of  the  variables  within  the  record  on  the  chart 
is  the  order  in  which  they  are  read.  Remember,  each  variable  is  a 
twenty  column  field. 
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TABLE  1  A  LAYOUT  OF  THE  GESS  INPOT  BY  SECTION  (Page  2  of  5) 


Section  Record  (or  Line  of  Input) _ Remarks 
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III.  HJNNING  THE  GESS  PROGRAM 

The  GESS  Program  can  be  executed  by  submitting  a  previously  prepared 
submit  file  that  contains  all  of  the  Job  Control  Cards  (CDC  KRONOS 
Operating  System) . 

NOTE:  It  is  likely  that  different  permanent  file  names  will  be  used 

at  times  (e.g.  when  different  input  files  or  Aerodynamic 
Coefficient  Table  Files  are  used) .  Make  the  proper  changes 
before  submitting  the  job.  The  permanent  file  name  for  the 
input  file  should  be  associated  with  TAPE1.  The  permanent  file 
name  for  the  Aerodynamic  Coefficient  Table  should  be  associated 
with  TAPE2. 

Refer  to  Appendix  B  for  a  listing  of  the  submit  file. 

TO  run  the  GESS  Program  from  an  interactive  terminal  execute  the  following 
GET,  filename 

SUBMIT,  filename,  El  =  Print  Site 

If  any  fatal  input  errors  occur  then  make  the  corrections  and  re-submit 
the  job. 

Note  that  a  special  library,  MATLIB4,  is  used.  This  library  contains 
special  math  functions  that  are  needed  to  run  the  GESS  Program.  Be 
sure  that  this  library  is  present  in  the  submit  file. 
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IV.  THE  AERODYNAMIC  COEFFICIENT  TABLES  PROGRAM  (ACT) 

A  preliminary  step  must  be  taken  before  running  the  GESS  Program.  Program 
"ACT"  must  be  executed  to  create  the  Aerodynamic  Coefficient  tables  used 
by  GESS.  This  program  (ACT)  is  only  run  once.  The  tables  created  by 
the  ACT  program  are  saved  on  a  Randan  Access  File  and  can  be  used  in- 
definately.  Tie  only  reason  for  re-running  "ACT"  would  be  to  change  the 
Aerodynamic  Coefficients. 

Funning  the  ACT  Program  can  be  broken  down  into  three  parts.  First, 
the  input  coefficients  must  be  put  into  card  form  and  stored  on  a 
permanent  file  (associated  with  Tape  10) .  Secondly,  the  ACT  Program 
must  be  executed.  Third,  the  Aerodynamic  Coefficient  Tables,  created 
by  the  ACT  program,  are  saved  on  a  Random  Access  File  which  can  be  used 
by  the  GESS  Program.  Refer  to  Appendix  D  for  a  detailed  description 
of  the  ACT  Program  and  details  on  hew  to  run  the  job.  Refer  to 
Appendix  E  for  a  Fortran  Listing  of  the  ACT  Program. 


( 
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V.  PLOTTING  FILE 


The  GESS  Program  creates  a  file  of  plot  information  (TAPE40) .  This  file 
is  saved  as  a  Permanent  Direct  Access  File  called  GESSPLT  (which  is  done 

4 

within  the  submit  file  automatically) .  There  are  utility  programs 
available  for  plotting  the  data  on  this  file.  This  plotting  exercise  is 
optional  and  is  not  part  of  this  manual. 
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VI.  RE-PUN  OPTION 

This  enhancement  has  not  been  fully  implemented.  Currently  the  IRESTRT 
variable  in  Section  1  input  (Program  Control  Variables)  must  be  set  to 
zero  (0)  to  bypass  the  creation  of  the  restart  file  (which  is  not 
complete) . 

When  this  is  fully  implemented  the  user  will  have  the  option  of  creating 
a  restart  file  (IRESTRT  =  1)  or  not  (.IRESTRT  =  0) .  This  will  allow 

a  user  to  restart  the  GESS  program  at  seme  particular  time  period  car 
event  based  on  the  previous  run,  thus  eliminating  the  necessity  of 
starting  the  run  fran  the  very  beginning  of  the  sequence. 

( 
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APPENDIX  A 

GESS  INPUT  VARIABLES 

(PBFINITICNS /  UNITS  OF  MEASUREMENT,  LEGAL  VALUES,  AND  INPUT  FORMATS) 
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INPUT  DESCRIPTIONS  -  SECTION  1  -  Program  Control  Variables 


VARIABLE 

NAME 


DCWHAT 


ESTOP 


PORKYT 


8A10 


IAXRTR 


12 


PI 


UNITS 


N.A. 


N.A. 


DEFINITION 


allows  mulitple  runs.  Each  inpat  set  must] 
begin  with  a  start  card.  Only  last  input 
set  is  terminated  with  a  stop  card  or  a 
blank  card. 

event  at  which  to  stop  trajectory 
0  stop  at  time  TSTOP 

1  catapult  ignition  -  catapult  1 

2  catapult  ignition  -  catapult  2 

3  catapult  separation  -  catapult  1 

4  catapult  separation  -  catapult  2 

5  rail  separation 

6  rocket  ignition  (rkt  1) 

7  rocket  ignition  (rkt  2) 

8  rocket  ignition  (rkt  31 

9  rocket  ignition  (rkt  4) 

10  rocket  ignition  (rkt  5) 

11  rocket  ignition  (rkt  6) 

12  rocket  burnout  (rkt  1) 

13  rocket  burnout  (rkt  2) 

14  rocket  burnout  (rkt  3) 

15  rocket  burnout  (rkt  4) 

16  rocket  burnout  (rkt  5) 

17  rocket  burnout  (rkt  6) 

18  parachute  deployment  (chute  1) 

19  line  stretch  (chute  1) 

20  full  inflation  (chute  1) 

21  parachute  deployment  (chute  2) 

22  line  stretch  (chute  2) 

23  full  inflation  (chute  2) 

24  parachute  deployment  (chute  3) 

25  line  stretch  (chute  3) 

26  full  inflation  (chute  3) 

27  peak  trajectory 

28  seat/occupant  separation 

29  seat/occupant  impact 

30  occupant  impact 

31  seat  impact 

32  aircraft  impact 

33  dart  start  iine  1  (right) 

34  dart  start  line  2  (left) 

35  dart  line  broken  -  line  1  (right) 

36  dart  line  broken  -  line  2  (left) 

aircraft  trajectory  control  flag 
0  =>do  not  generate  aircraft  trajectory 
1  =>  generate  aircraft  trajectory 


mvu.  vajjuls 


rr-vfr,  (stop,  c 

il.tttk  card) 


0-36 
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INPUT  DESCRIPTIONS  -  SECTION  1  -  Program  Control  Variables  -  Continued 


FORMAT 


DEFINITION 


ur,\i.  value. 


clearance  corputation  control  flag 
0  =  >do  not  compute  aircraft/ scat  - 
occupant  clearance 

1  =  >  compute  aircraft/seat  -  occupant 
clearance 


ISEATTR 


ISOSEP 


TRESTKT 


IUNITS 


TSTABT 


plotting  file  control  flag 
0  =  >do  not  create  plotting  file 
1  =>  create  plotting  file 

seat  alone  trajectory  control  flag 
0  =>do  not  generate  seat  alone  trajectory 
1  =>  generate  seat  alone  trajectory 

seat/occupant  separation  control  flag 
0  =>ao  not  allow  seat/occupant  separation 
1  =>  allow  seat/occupant  separation 

flag  for  creation  of  instantaneous  restart 
file 

0  =  don't  create  restart  file 
1  =  create  restart  file 

flag  for  units  to  be  used 
0  =  Metric  units 
1  *  English  units 

tire  to  start  trajectory  simulation 
(if  /  0,  start  from  restart  file  ) 

tire  to  stOD  trajectory 
(if  =  0,  stop  at  event  ESTOP) 


✓"V  /s<\ 


N ADC-S1224-60 


A-6 


NAHC-8 12 24-60 


INPUT  DSSCRrmONS  -  SECTION  3  -  Integration  Time  Stops 


VARIABLE 

NAME 

UNITS 

DEFINITION 

DTPHAS1 

F10.4 

Integration  time  step  for  PilASE  1 
(from  initiation  to  rail  clearance) 

OTPHAS2 

F10.4 

Integration  time  step  for  PHASE  2 
(from  rail  clearance  to  seat/occ 
separation) 

DTPHAS3 

F10.4 

Integration  time  step  for  PHASE  3 

(from  seat/occ  separation  to  completion) 


DTPHAS3 


f; 
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TMPOT  DESCRIPTION  -  SECTION  5 


Seat  Alone 


E 


AREASA 

HOHTSA 


ft2  (met2) 

ft.  (met) 

slug-ft2 

kg-met2 

slug-ft2 

kg-met2 

slug-ft2 

kg-met2 

slug-met2 

kg-met^ 


F10.4 

slug-met2 

kg-met2 

F10.  4 

slug-met2 

F10. 4 

F10.4 

F10. 4 

kg-met2 

deg 

deg 

deg 

F10. 4 

lbs  (kg) 

F10. 4 

ft.  (met) 

F10.4 

ft.  (met) 

F10. 4 

ft.  (met) 

F10. 4 

ft.  (met) 

I 

F10. 4 

ft.  (met) 

F10. 4 

ft.  (met) 

F10.4 

ft.  (met) 

F10. 4 

ft.  (met) 

F10. 4 

ft.  (met) 

DEFINITION 

reference  area  of  seat  alone 
length  of  seat  alone  (height) 


Initial  Cork! it- ions 


UXiM.  VALUES 


Monerrts  of  inertia  of  the  seat  alone 


rotation  about  x  -  axis  of  aircraft 

rotation  (neg. )  about  y  -  axis  of  aircraft 

rotation  about  z  -  axis  of  aircraft 

weight  Of  seat  alone 

X  position  of  CG  of  seat  alone  in  SCS 

X  position  of  seat  bottom  in  PCS 

X  position  of  origin  of  Seat  C.S.  (lower  seat 
reference  point  in  PCS) 

Y  position  of  CG  of  seat  alone  in  SCS 

Y  position  of  seat  bottom  in  RCS 

Y  position  of  origin  of  Seat  C.S.  (lower  seat 
reference  point  in  RCS) 

Y  position  of  seat  aerodynamic  reference  point 
in  SCS 

Z  position  of  CG  of  seat  alone  in  SCS 
Z  position  of  seat  bottom  in  RCS 


INPUT  DESCRIPTIONS  -  SECTION  6 


VARIABLE 

AREAOA 

AREASO 

DOHA 

IXXSO 

IXVOA 

IXY50 

IXZOA 

1X250 

n-iOA 

IYYSO 

IYZOA 

IYZ50 

IZ2GA 

12230 

WGirOAA 

WGhTDAB 

WGhTSO 

XCC32A 

XD3S0 

YCG3A 


Seat/Occupant,  Occupant  Along 


FORMAT 

F10. 4 

F10. 4 

:t2(met2) 

F10. 4 

slug- ft2 
eg  met2 

F10. 4 

slug-ft2 
eg  met2 

F10.4 

slug-ft2 
kg  ret2 

F10.4 

slug-ft2 
kg  met2 

F10.4 

slug-ft2 
kg  met2 

F10. 4 

slug-ft2 
kg  met2 

F10. 4 

slug-ft2 
kg  met2 

F10. 4 

slug-ft2 
kg  met2 

F10.4 

slug-ft2 
kg  met2 

F10.4 

slug-ft2 
kg  net2 

F10.4 

slug-ft2 
kg  met2 

F10.4 

slug-ft2 
kg  met2 

F10.4 

lbs  (kg) 

F10.4 

lbs  (kg) 

F10.4 

lbs  (kg) 

F10.4 

ft (met) 

F10.4 

ft  (met) 

F10.4 

ft  (met) 

DEFINITION 


reference  area  if  occupant  alone 
reference  area  of  seat/occupant 
moment  of  inertia  of  occupant  alone 


recant  of  inertia  of  seat/occupant 

moment  of  inertia  of  occupant  alone 
nonent  of  inertia  of  seat/occupant 
moment  of  inertia  of  occupant  alone 
nrment  of  inertia  of  seat/occupant 
moment  of  inertia  of  occupant  alone 
moment  of  inertia  of  seat/occupant 
moment  of  inertia  of  occupant  alone 
moment  of  inertia  of  seat/occupant 
moment  of  inertia  of  occupant  alone 
moment  of  inertia  of  seat/occupant 


weight  of  occupant  alone  after  seat/occ  separ. 
weight  of  occupant  alone  before  seat/occ  separ. 
weight  of  seat/occupant 
X-position  of  occupant  alone  C.G.  (SCS) 
X-position  of  seat/occupant  C.G.  (SCS) 
Y-position  of  occupant  alone  C.G.  (SCS) 
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ElPirr  DCSCRI PTICN'S  -  SECTION  7  -  Rail  Data 


VARIABLE 

NA.NE 

FORMAT 

UNITS 

DEFINITION 

IJDU  VALUES 

ISTRL 

13 

N.A. 

flag  to  indicate  whether  slider  blocks  are  on  scat 
or  on  rails 

0  =  on  seat 

1  *  on  rails 

0.  1  F 

KXSB 

F10.6 

lbs/ft 

(nt/met) 

X  -  direction  spring  constant 

KYSB 

F10. 6 

lbs/ft 

(nt/met) 

Y  -  direction  spring  constant 

NJSB 

F10.6 

N.A. 

coefficient  of  friction 

NSLBKS 

13 

N.A. 

rnanber  of  slider  blocks 

(NOTE:  0  =  ’ continuous ’  slider  block) 

0-6  F 

PAHANG 

F10. 4 

deg 

orientation  of  rails  wrt  ACS 

RAILOTH 

F10. 4 

ft  (met) 

length  of  rails 

XKIDR 

*  Tb  Be  Added  Later 

XPOSLRE 

F10. 4 

ft  (met) 

X  -  position  of  left  rail  attachment  point  in  ACS 

XPOSRRE 

F10.4 

ft  (met) 

X  -  position  of  right  rail  attachment  point  in  ACS 

XP0SS31 

F10.4 

ft  (met) 

X  -  position  of  slider  block  1  SCS 

XPCSS32 

F10. 4 

ft  (met) 

X  -  position  of  slider  block  2  SCS 

XP0SS33 

F10.4 

ft  (met) 

X  -  position  of  slider  block  3  SCS 

XP0SSB4 

F10.4 

ft  (met) 

X  -  position  of  slider  block  4  SCS 

XPOSSB5 

F10. 4 

ft  (met) 

X  -  position  of  slider  block  5  SCS 

XPOSS36 

F10.4 

ft  (met) 

X  -  position  of  slider  block  6  SCS 

XPOSLRE 

F10.4 

ft  (met) 

Y  -  position  of  left  rail  attachment  point  in  ACS 

XPOSRRE 

F10.4 

ft  (met) 

Y  -  position  of  right  rail  attachment  point  in  ACS 

XP0SS31 

F10.4 

ft  (met) 

Y  -  position  of  slider  block  1  SCS 

YPOSSB2 

F10. 4 

ft  (met) 

Y  -  position  of  slider  block  2  SCS 

YPOSSB3 

F10. 4 

ft  (met) 

Y  -  position  of  slider  block  3  SCS 

XPOSS84 

F10.4 

ft  (met) 

Y  -  position  of  slider  block  4  SCS 

A-14 
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HreVT  DESCRIPTION'S  -  Section  7  -  Rail  Dota  -Continued 


VARIABLE 

FORMAT 

UNITS 

DEFINITION 

NAME 

YPCSS35 

F10.4 

ft  (met) 

Y  -  position  of  slider  block  S  SCS 

YP0SSB6 

F10.4 

ft  (met) 

y  -  position  of  slider  block  6  SCS 

ZPOSLRE 

F10.4 

ft  (met) 

Z  -  position  of  left  rail  attachment  point 

in  ACS 

2POSRRE 

F10. 4 

ft  (met) 

Z  -  position  of  right  rail  attachment  point 

in  ACS 

ZPOSSBl 

F10.4 

ft  (net) 

Z  -  position  of  slider  block  1  SCS 

2FOSSB2 

F10. 4 

ft  (met) 

2  -  position  of  slider  block  2  SCS 

2POSSB3 

F10.4 

ft  (met) 

Z  -  position  of  slider  block  3  SCS 

ZPOSSB4 

F10. 4 

ft  (met) 

Z  -  position  of  slider  block  4  SCS 

ZPOSSB5 

F10. 4 

ft  (met) 

Z  -  position  of  slider  block  S  SCS 

ZF05SS6 

F10.4 

ft  (met) 

Z  -  position  of  slider  block  6  SCS 

N ADC-81224-60 


VARIABLE 

NAME 

ICANOPV 


NOTE: 


INPUT  DESCRIPTIONS  -  SECTION _ 8  -  Canopy  Data 


FORMAT 

UNITS 

DEFINITION 

13 

N.A. 

Flag  to  indicate  whether  or  not  to  track 
canopy 

0  =  do  not  track  canopy 

1  =  track  canopy 

Canopy  trajectory  sioulation  will 
be  implemented  at  a  later  date. 


DEFINITION 


YP0SCAP2 

F10. 4 

ft  (met) 

ZF0SCAP1 

F10. 4 

ft  (met) 

ZF3SCAP2 

F10. 4 

ft  (met) 

Y  -  position  of  catapult  2  attachment  point 
in  SCS 

Z  -  position  of  catapult*  1  attachment  point 
in  SCS 

Z  -  position  of  catapult  2  attachment  point 
in  SCS 


N ADC-8 1224-60 


INPUT  DESCRIPTION'S  -  SECTION  10  -  fcAet  Data  -  Cor;  tin  tied 


VARIABLE 

NAME 

for-at 

UNITS 

DEFINITION 

RKGAKAl 

F10.4 

deg 

(rkt  l 

thrust  table 

secs  vs  lbs 
secs  vs  nts 

thrust  table  for  racket  1 

KKGAMA2 

F10. 4 

deg 

(RKT  2 

thrust  table 

secs  vs  lbs 
secs  vs  nts 

thrust  table  for  rocket  2 

RKGAMA3 

F10. 4 

deg 

(rkt  3 

thrust  table! 

secs  vs  lbs 
secs  vs  nts 

thrust  table -for  rocket  3 

RKGAHA4 

F10. 4 

deg 

(RKT  4 

thrust  table 

secs  vs  lbs 
secs  vs  nts 

thrust  table  for  rocket  4 

RKGAMA5 

F10.4 

deg 

(RKT  5 

thrust  table) 

| 

secs  vs  lbs 
secs  vs  nts 

thrust  table  for  racket  5 

RKGAMA6 

F10. 4 

deg 

(RKT  6 

thrust  table) 

secs  vs  lbs 
secs  vs  nts 

thrust  table  for  rocket  6 

RKXGN1 

F10. 4 

sec  ft  ret 

rocket  1  ignition  time  or  distance 

HKIGN2 

F10.4 

sec  ft  net 

rocket  2  ignition  time  or  distance 

RKCGN3 

F10. 4 

sec  ft  met 

rocket  3  ignition  time  or  distance 

RKCGN4 

F10.4 

sec  ft  met 

rocket  4  ignition  tine  or  distance 

RKIGN5 

F10.4 

sec  ft  met 

rocket  5  ignition  time  or  distance 

RKIGN6 

F10.4 

sec  ft  met 

rocket  6  ignition  time  or  distance 

RKNPTS1 

13 

N.A. 

nurber  of  points  in  thrust  table  for 
rocket  1 

RKNPTS2 

13 

N.A. 

nurber  of  points  in  thrust  table  for 
rocket  2 

RKNPTS3 


13 


number  of  points  in  thrust  table  for 
rocket  3 
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INPUT  DESCRIPTIONS  -  SHCTTC N  11  -  Dart 


VARIABLE 

NAME 

POit-'AT 

UNITS 

DEFINITION 

DRIFRCE 

F10. 4 

lbs  nts 

DART  FOFCE 

DRTSTRT 

FI0.4 

ft.  met 

DART  START  DISTANCE 

ORTSTOP 

F10.4 

ft.  met 

DART  STOP  DISTANCE 

IDAKT 

13 

N.A. 

DARTFIAG:  0  =  no  dart  system 

1  =  DART  system 

XDRXAPL 

F10.4 

ft.  met 

X  POSITION  OF  LEFT  DART  COCKPIT  ATTACHMENT 

POINT  IN  SCS 

3CDKEAPR 

F10.4 

ft.  met 

X  POSITION  OF  RIGHT  DART  COCKPIT  ATTACHMENT 

POINT  IN  SCS 

XDRTCPL 

F10.4 

ft.  met 

X  POSITION  OF  LEFT  DART  CONFLUENCE  POINT  IN  SCS 

XDRTCPR 

F10. 4 

ft.  net 

X  POSITION  OF  RIGHT  DART  CONFLUENCE  POINT  IN  SCS 

YDKEAFL 

F10. 4 

ft.  met 

Y  POSITION  OF  LEFT  DART  COCKPIT  ATTACHMENT  POINT 
IN  SCS 

YDKEAPR 

F10.4 

ft.  met 

Y  POSITION  OF  RIGHT  DART  COCKPIT  ATTACHMENT  POINT 
IN  SCS 

YDRICRL 

F10. 4 

ft.  net 

Y  POSITION  OF  LEFT  DART  CONFLUENCE  POET  IN  SCS 

YDRTCPR 

F10. 4 

ft.  met 

Y  POSITION  OF  RIGHT  DART  CONFLUENCE  POET  IN  SCS 

ZDRTAPL 

F10.4 

ft.  met 

Z  POSITION  OF  LETT  DART  COCKPIT  ATTACHMENT  POINT 
IN  SCS 

ZDRTAPR 

F10. 4 

ft.  met 

Z  POSITION  OF  RIGHT  DART  COCKPIT  ATTACHMENT  POINT 
IN  SCS 

ZDKTCPL 

F10.4 

ft.  met 

Z  POSITION  OF  LEFT  DART  CONFLUENCE  POET  IN  SCS 

Ur-M.  VALUES 


>  DART  STAR 

0.  1 


ZDRTCPR 


ft.  met 


Z  POSITION  OF  RIGHT  DART  CONFLUENCE  POINT  IN  SCS 
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NADC-5 1224-60 


VARIABLE 

NAME 

IFTDROl 

IFTDR02 

IFTRBCV 

IRQOOV 

romm 

NPTDFT2 

NPTSDLS 

NPTSR5T 

NPISRLS 

POROSD1 

PORDSD2 

PORDSR 

FHCDRAG 

REOCWFT 

RECDVLL 

REXX3VLS 

REODVPD 

SEPFHCE 


INPUT  DESCRIPTIONS  -  SCCTlCr:  14  -  PARACHUTE  VARIABLF-S  -  Contim 


FORMAT 


UNITS 


DEFINITION 


13 

N/A 

FILLING  TIME  CONTROL  FLAGS  TOR  DRCCUES  1  AND  2 

13 

N/A 

=  0  -  CALCULATED  THEORETICAL 
=  1  -  TABLES 

13 

N/A 

FILLING  TOE  CONTROL  FLAG  FOR  RFXXJVEKY  CHUTE 
=  0  -  CALCULATED  THEORETICAL 
=  1  -  TABLE 

13 

N/A 

FLAG  TO  INDICATE  WHETHER  OR  NOT  THERE  IS  A 
RECOVERY  CHUTE 

0  =  NO  RECOVERY  CHUTE 

1  =  STENCEL 

2  =  GO  TYPE  AEROCCf.TCAL  CANOPY 

13 

N/A 

NUMBER  CF  POINTS  IN  FIRST  DROGUE  CHUIE  FILLING 
TIME  TABLE 

13 

N/A 

NUMBER  OF  POINTS  IN  SECOND  DROGUE  CHUIE  FILLING 
TIKE  TABLE 

13 

N/A 

NUMBER  OF  POINTS  IN  DROGUE  CHUTE  LINE  STRETCH 
TABLE 

13 

N/A 

NUMBER  OF  POINTS  IN  RECOVERY  CHUIE  FILLING 

TIME  TABLE 

13 

no.  4 

N/A 

N/A 

N/A 

NUMBER  OF  POINTS  IN  RECOVERY  CHUIE -LINE 

STRETCH  TABLE 

EFFECTIVE  POROSITY  OF  DROGUE  CHUTE1 

fio.4 

EFFECTIVE  POROSITY  OF  DROGUE  CHUTE2 

N/A 

EFFECTIVE  POROSITY  OF  RECOVERY  CHUTE 

N/A 

RECOVERY  CHUTE  DRAG  COEFFICIENT 

TABLE  OF  TIMES  FROM  RECOVERY  CHUTE  LINE  STRETCH 
TO  FULL- INFLATION  (VELOCITY  VS.  TIKE) 

FT  (MET) 

RECOVERY  CHUIE  LINE  LENGTH 

fio.4 

FT/SBC  S 
MET/ SDO  e 

c 

TABLE  OF  TIMES  FROM  SHACKLE  RELEASE  TO  RECOVERY 
CHUTE  LEE  STRETCH  (VELOCITY  -  VS.  TIME) 

fio.4 

FT  (MET) 

RECOVERY  CHUTE  PROJECTED  DIAMETER 

fio.4 

LBS  NTS 

SEPARATION  FORCE  SEAT/OCCUTANT 

NADC-S1224-60 


APPENDIX  B 


LISTING  OF  THE  GESS  SUBMIT  FILE 


B-l 


/JOB 

GESS(CBl73000,T30) 

ACCOUNT  (NUMBER,  PASSWORD) 

RETURN (TAPEl , TAPE2 , TAPE3 , TAPE4 ) 

RETURN  (TAPE5 , TAPES, TAPE7 , TAPE3 ) 
RETURN (TAPE9 , TAPE10 , TAPEll , TAPEl- ) 
return (TAPE13 , TAPE14 ,TAPE15 , TAPE16 ) 
RETURN (TAPE17 , TAPE18 , TAPE19 , TAPE2 
rEIURN (TAPE21 ,TAPE22 , TAPE2  3 , TAPE24 ) 
(TAPE25  ,TAPE26  ,TAPE27  ,TAPE28 ) 
RETURN  (TAPE29  ,TAPc,30 ,  TAT -31) 

REWRI4  (TAPE32  ,TAPE33  ,TAPE34 
RETURN (TAPE35 , TAPE36 , TAPE37 ) 

RETURN  (TAPE38 ,  TAPE39 ,  TAPE4  0 
PURGE (GESSPLT) 

DEFINE  (TAPE4  0=GESSPLT ) 

GET(TAPE1=GESSIN) 

GETT  { TAPE2= AEPD4 ) 

GET (GESBNRY) 

get  (MATLIB4/UN=SYSTEM) 

LDSET ( LI B=MATLIB 4 , MAP=BS) 

l^BBnND  (TAPEl ,  TAPE2 ,  T^£3,TAPE4 ) 
REWIND (TAPE 5 , TAPE6 , TAPE7 , -APE8 > 
REWIND  (TAPE9,TAPE10 , TAPEll, T2PE12) 
REWIND  (TAPE13 ,  TAPE14 ,  TAPE15 ,  TAPE16 ) 

S®(TAPE17,TAPE18.TAPE19,^E20 

RE14IND  (TAPE21  ,TAPE22  ,TAPE23  ,TAPE24 
REWIND (TAPE25 , TAPE26 , TAPE27 , TAP 
REWIND  (TAPE29 ,  TAPE30 ,  TAPE31 
REWIND (TAPE32 , TAPE33, TAPE) 

REWIND  (TAPE35 ,  TAPE36 ,  TAPE37 
REWIND (TAPE33 , TAPE39 ,TAPE40) 

COPYBF (TAPE5) 

OOPYBF (TAPE6) 

COPYBF (TAPE7) 

COPYBF (TAPES) 

OOPYBF  (TAPE9) 

COPYBF (TAPE10) 

COPYBF (TAPEll) 

COPYBF (TAPE12) 

OOPYBF (TAPEl 3) 

COPYBF (TAPE14) 

OOPYBF (TAPE15) 

OOPYBF (TAPE16) 

COPYBF (TAPEl 7 ) 

COPYBF (TAPE18) 

COPYBF (TAPE19) 

OOPYBF (TAPE20) 
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OOPYBF (TAPE21) 
OOPYBF (TAPE22) 
OOPYBF (TAPE23) 
OOPYBF (TAPE24) 
COPYBF (TAPE25) 
COPYBF (TAPE2 6) 
COPYBF (TAPE27 
OOPYBF  (TAPE28) 
COPYBF (TAPE29 ) 
COPYBF  fTAPE30 
OOPYBF (TAPE31) 
OOPYBF (TAPE32) 
COPYBF  (TAPE33) 
OOPYBF (TAPE34) 
OOPYBF  (TAPE35) 
OOPYBF (TAPE36) 
OOPYBF (TAPE37) 
COPYBF (TAPE38 ) 
OOPYBF (TAPE39) 
EXIT. 

GOTO,l. 

/BOR 

/BOX 


B-3 


I 
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APPENDIX  C 


SAMPLE  INPUT  FOR  THE  GESS  PROGRAM 


C-l 

t 
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START 

THIS  IS  TEST  DATA 

FOR  MPES  NON-CATAPULT  VERSION,  90  DEG  ROLL  TEST 
THIRD  LINE 


TSTART 

0.0  TSTOP 

0.00  ESTOP 

12 

IUNITS 

1  IAIRTR 

0  ISEATTR 

0 

ISOSEP 

0  IPLOT 

1 

IREPTS(l) 

1IREPTS  (2) 

1IREPTS (3) 

1 

IREPTS (4) 

OIREPTS (5) 

1IREPTS (6) 

0 

IREPTS  (7) 

OIREPTS (8) 

OIREPTS  (9) 

0 

IREPTS (10) 

OIREPTS (11) 

OIREPTS (12) 

1 

IREPTS (13) 

1IREPTS (14) 

OIREPTS (15) 

0 

IREPTS (16) 

OIREPTS (17) 

OIREPTS  (18) 

0 

IREPTS (19) 

OIREPTS (20) 

0IREPTS(21) 

0 

IREPTS (22) 

1IREPTS (23) 

1IREPTS (24) 

1 

IREPTS (25) 

OIREPTS (26) 

OIREPTS (27) 

0 

IREPTS (28) 

OIREPTS (29) 

OIREPTS (30) 

0 

PRTFRQ 

0EPHAS1 

10 

.00125  CTPHAS2 

.00125  ETPHAS3 

.01 

TEMP 

89.0  PRESSUR 

925.900  VROC 

0.0 

XPOS 

7300.0  YPOS 

-9.5  ZPOS 

61.0 

yaw 

0.0  PITCH 

0.0  ROLL 

180.0 

KVEL 

0.0  QVEL 

0.0  PVEL 

0.0 

WM)X 

0.0  WINDY 

0.00  WINDZ 

0.0 

VELTOTL 

0.00  CKPITHT 

4.0  DENSITY 

0.0 

NPTSAAT 

NPTSLAT 

XPOSSRP 

0 

0 

0.0  YPOSSRP 

0.0  ZPOSSRP 

0.0 

XCGSA 

.4648  YCGSA 

0.0  ZCGSA 

1.1299 

IXXSA 

4.0  IXYSA 

0.0  IXZSA 

0.0 

IYYSA 

5.0  IYZSA 

0.0  IZZSA 

1.0 

PHISA 

0.0  PSISA 

-13.0  THESA 

0.0 

AREASA 

6.0  HGHTSA 

3.0  WGHTSA 

143.0 

XPOSBOT 

0.0  YPOSEOT 

0.0  ZPCSBOT 

0.0 

XPOSSCS 

0.0  YPOSSCS 

0.0  ZPOSSCS 

0.0 

XCGSO 

0.8250  YCGSO 

0.0  ZCGSO 

1.092 

IXXSO 

.10.75  IXYSO 

0.0  XXZSO 

3.46 

IYYSO 

15.19  IYZSO 

0.0  IZZSO 

6.82 

AREASO 

7.5  W3TTSO 

359.0 

IXXQA 

0.0  IXYOA 

0.0  DCZQA 

0.0 

IYYOA 

0.0  IYZQA 

0.0  IZZCA 

0.0 

AREAOAA 

9.6  KGHTQAB 

216.0  KGHTQAA 

216.  ( 

RAILNTH 

*3.66  RAILANG 

-13.0 

ISTRL 

0  NSLBKS 

0 

KXSB 

35000.0  KYSB 

20000.0  MUSB 

0.025 

XKTOR 

XPOSRRE 

261.7801 

0.0  YFOSRRE 

0.0  ZPCSRRE 

0.0 

XPOSLRE 

0.0  YPOSLRE 

0.0  ZPOSLRE 

0.0 

INCAT 

CATLNT(l) 

1 

3.60  CATSTK(l) 

3.60  TCI (1) 

0.0 

XPOSAP(l) 

0.00  YPOSAP(l) 

0.00  ZPOSAP(l) 

-3.59 

C-2 


IRESTRT 

ICLRNCE 
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NPTSCT(l) 

2 

0.0 

0.0 

0.3 

0.0 

nUBEND 

INRKT 

RKFLAG(l) 

FKIGN(l) 

0 

1 

0  RKNPTS(l) 
0.0  RKKGHT(l) 

20 

6.0  RKBURN(l) 

1.750 

XPOSRK(l) 

.8553  YPOSRK (1) 

0.0  ZPOSRK(l) 

0.0 

FKALPH(l) 

90.000  RKBEIA(l) 

90.00  RKGAMA(l) 

0.000 

0.0 

0.0 

0.0921 

787.9523 

0.1842 

1065.9542 

0.2763 

1410.8922 

0.3684 

1761.9124 

0.4605 

2693.0230 

0.5526 

2693.0230 

0.6447 

3133.0848 

0.7368 

3474.7570 

0.8289 

3793.9460 

0.9211 

3938.1702 

1.0132 

3871.6354 

1.1053 

3495.4746 

1.1974 

2955.9940 

1.2895 

2219.5930 

1.3816 

1268.8412 

1.4737 

573.4004 

1.5658 

218.1590 

1.6579 

34.0892 

1.7500 

0.0000 

IDAKT 

ITVC 

mphi 

0 

1 

180.0000  MPSI 

13.0  MTHE 

0.000 

BOLLHL 

16.000  PITCHHL 

16.00  SMPLRAT 

500.00 

TVCDLAY 

3DYNCG 

IRECOV 

IDROGUE 

STOP 

.400  RKANG 

0 

0 

0 

0.0 

C-3 
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APPENDIX  D 


DETAILED  DESCRIPTION  OF  THE  ACT  PROGRAM 
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ABSTRACT 


This  appendix  describes  a  Fortran  extended  program  designed  to  create 
randan  files  of  equally  spaced  aerodynamic  coefficient  tables.  These 
tables,  which  may  represent  functions  of  two  or  three  variables,  are 
to  be  used  as  input  data  for  a  seat  ejection  program  (GESS) . 

These  coefficients  are  used  in  the  canputation  of  the  equations  which 
calculate  the  aerodynamic  forces  and  moments  acting  on  a  body. 

This  appendix  was  derived  almost  entirely  from  Reference  5.  It  is 
included  here  since  it  is  crucial  for  the  successful  execution  of 
the  GESS  Program. 
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I.  INTRODUCTION 

During  execution  of  the  GESS  seat  ejection  simulation  program,  equally 
spaced  aerodynamic  coefficients  are  required  to  compute  the  aerodynamic 
forces  acting  upon  the  seat/occupant  system.  These  data  have  been  obtained 
through  wind  tunnel  experiments  using  various  ejection  seats.  Using 
the  data  that  were  produced  by  these  tests,  the  aerodynamic  coefficient 
table  (ACT)  program  creates  tables  that  are  a  function  of  the  seat 
orientation  and  its  velocity.  See  Reference  6  for  details  on  the  wind 
tunnel  experiments. 

The  ACT  program  provides  an  efficient  method  of  creating  and  modifying 
these  aerodynamic  coefficient  tables.  The  tables  are  then  stored  on  a 
random  access  file  so  that  they  can  be  easily  retrieved  by  the  GESS 
program  during  execution  of  simulation  nans. 


Because  of  their  similarity,  this  program  was  closely  modeled  after 
the  "RFWTHR”  Program  (see  Reference  3) . 
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II.  DESCRIPTION 

A.  Aerodynamic  Coefficient  Tables 

The  ACT  program  creates  Aerodynamic  Coefficient  Tables  that  are  designed 
to  be  functions  of  either  two  or  three  variables.  The  format  in  which 
the  ACT  tables  are  created  is  designed  to  be  similar  to  the  format  in 
which  the  experimental  data  are  received.  A  maximum  of  500  entries  is 
allowed  in  a  table.  For  three-way  tables,  the  coefficients  are  functions 
of  the  angle  of  attack  (alpha) ,  the  angle  of  sideslip  (beta) ,  and  mach 
number  (mach) .  The  two-way  tables  may  be  functions  of  beta  and  mach, 
beta  and  alpha,  or  alpha  and  mach. 

By  specifying  the  order  in  which  the  data  must  be  read  into  memory,  and 
through  the  use  of  variable  dimensioned  arrays,  the  user  can  easily  store 
and  reference  his  tables  on  randan  files.  As  the  coefficients  are  stored 
in  consecutive  locations  in  memory',  it  is  necessary  that  the  data  be  read 
in  as  follows: 

For  three-way  data: 

C(I,J,K)  =  F (ALPHA (I) , BETA (J) , MACH (K) ) ,  I  =  1,L 

J  =  1,M 
K  =  1,N 

For  two-way  data: 

C(J,K)  =  F (BETA (J) , MACH (K) ) ,  J  =  1,M 

K  =  1,N 

or  C(J,I)  =  F (BETA (J), ALPHA (I)) ,  J  =  1,M 

I  =  1,L  . 
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Or  C(I,K)  =  F (ALPHA (I) , MACH (K) ) ,  I  =  1,L 

K  =  1,N 

Where  L,  M,  and  N  are  the  number  of  alpha,  beta,  and  mach  coordinates, 
respectively’.  Properly  dimension.  ,  the  array  name  at  (L,M,N) ,  facilitates 
printout  of  the  tables. 

B.  Sequence  Numbers 

A  sequence  number  is  assigned  to  each  table  and  used  to  reference  the  disk, 
address  at  which  the  table  is  stored.  During  creation  runs,  the  program 
assigns  consecutive  numbers  to  the  tables  as  they  are  read.  It  was 
arbitrarily  decided  that  the  three-way  tables  would  be  assigned  sequence 
numbers  1  to  20,  and  two-way  tables  would  be  assigned  numbers  21  to  50. 

See  reference  5  for  further  information  on  randan  files  and  sequence 
numbers. 


When  the  tables  are  extended,  the  program  searches  the  appropriate  "info” 
array  (see  Section  II. D. 2)  to  determine  the  sequence  number  of  the  last 
table  on  randan  file.  The  tables  that  are  added  are  assigned  sequence 
numbers  beginning  with  the  next  available  sequence  number.  During  this 
search,  a  check  is  made  to  be  sure  that  the  tables  will  not  be  extended 
beyond  their  limit. 

To  replace  a  table,  the  user  must  specify  on  card  type  3,  the  sequenae 
number  of  the  table  he  wishes  replaced. 
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C.  "Info"  Array 

Associated  with  each  table  is  an  "info"  array,  containing  information 
about  each  table.  There  is  a  20  by  13  array,  INF03,  associated  with  the 
three-way  tables,  and  a  30  by  10  array,  INF02,  for  the  two-way  tables. 
These  arrays  are  updated  and  written  to  a  random  file  after  creating, 
extending,  or  replacing  tables.  To  facilitate  referencing,  the  20  by  13 
"info"  array  is  assigned  disk  address  51,  and  the  30  by  10  "info"  array 
is  assigned  address  52. 

During  an  extension  run,  the  proper  "info"  array  is  interrogated  to 
determine  the  number  of  tables  already  on  randan  file.  The  new  tables 
are  assigned  the  next  available  sequence  number,  provided  there  is  room 
to  extend  then. 

In  the  replacement  mode,  the  first  work  in  the  "info"  array  for  the  given 
sequence  number  is  checked  to  be  sure  that  a  table  with  that  sequence 
number  already  exists. 

The  contents  of  the  "info"  array,  with  J  representing  the  sequence  number 
of  the  current  table  being  processed,  are  as  shewn  below. 

For  two-way  tables: 

INF02 (J,l)  ■  Table  Identifier 
INF02(J,2)  =  Number  of  Betas 
INF02  (J,3)  =  Number  of  Machs 
INF02 (J,4)  =  Delta  Beta 
INF02 (J,5)  =  Delta  Mach 
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INF02(J,6)  =  Minimum  Beta 
INF02(J,7)  =  Minimum  Mach 
INF02(J,8)  =  Maximum  Beta 
INF02(J,9)  =  Maximum  Mach 
,  INF02 (J,10)=  Type  of  Two-way  Table 

Note:  Depending  on  the  type  of  two-way  table  being  processed,  the 
word  "Beta"  or  "Mach",  as  used  above,  may  be  replaced  by 
"Alpha". 

For  three-way  tables: 

INF03 (J,l)  =  Table  Identifier 
INP03(J,2)  =  Number  of  Alphas 
INF03 (J,3)  =  Number  of  Betas 
INF03  (J,4)  =  Number  of  Machs 
INF03 (J,5)  =  Delta  Alpha 
INF03 (J,6)  =  Delta  Beta 
INF03  (J,7)  =  Delta  Mach 
INF03(J,8)  =  Minimum  Alpha 
INF03(J,9)  =  Minimum  Beta 
INF03  (J  ,10)=  Minimum  Mach 
INF03  ( J ,  11)  =  Maximum  Alpha 
INF03(J,12)=  Maximum  feta 
INF03  (J,13)=  Maximum  Mach 

D.  Ccrnmon  Variables 

1.  Defined  Externally 

The  following  camion  variables  are  defined  by  the  user  through  the  input. 
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AIMAX 

BEMIN 

DELMAC 

ITYPE 

MODE 

OTYP 

ALMIN 

DEIALP 

FMT 

MAMAX 

NCOEF 

BEMAX 

DELBET 

IDENT 

MAMIN 

NOFTAB 

The  mnemonic  definitions  of  the  above  will  be  found  in  Section  III.C.l. 


2.  Defined  Internally 

The  following  table  gives  the  definitions  for  the  common  variables  which 
are  initialized  by  the  program. 


MNEMONIC 

IELNK 


IC 


IERIEST 


IJ,  IK 


INF02,  IF 2 
INF03,  IF 3 


DESCRIPTION 

Hollerith  word  for  blanking  out  the  table  name  in  the 
"info"  array. 

The  sequence  number  of  the  current  table.  Used  in  the 
ACT  and  INPUTT  routines  when  referencing  the  "info’  array. 
Internal  test  work,  set  by  the  ERMSG  subroutine,  which  will 
alter  the  flew  of  the  program  to  compensate  for  an  input 
error. 

=  1  Ignore  present  case,  read  next  type  1  card. 

=  2  Read  excess  tables  into  a  durnny  name. 

=  3  Disregard  present  table,  read  next  table. 

=  4  End  program  after  present  case. 

In  a  list  of  extend  run,  the/  return  the  number  of  tables 
that  have  been  written  to  the  "info"  array. 

Two  dimensional  array  which  is  equivalenced  to  the  three 
dimensional  array  INF03.  The  array  INF02  (30,10)  contains 
the  "info"  array  for  two-way  tables.  INF03  (20,13)  oontains 
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the  "info"  array  for  the  tables  of  three-way  data. 

Detailed  information  concerning  the  contents  of  the  "info" 
array  may  be  found  in  Section  II. C. 

ISEQNO  Ihe  sequence  number  of  the  table  bo  be  replaced.  (See 

Section  III.C.l) 

ITABNO  Position  of  table  "ISEQNO"  on  the  info  array. 

=  ISEQNO  -  20  for  two-way  tables. 

=  ISEQNO  for  three-way  tables. 

I2NO  The  number  of  two-way  and  three-way  tables,  respectively. 

I3NO 

Used  as  a  counter  when  printing  the  file  dictionary. 

MTEST  A  control  word  used  in  the  PTOUT  and  WRINFO  routines. 

=  0  Read  the  "info"  array  from  randan  file  prior  to 

processing  the  first  table  on  a  replace  or  an  extension 
run. 

=  1  Do  not  read  the  "info"  array  again. 

'=  9  The  PTOUT  routine  only  prints  the  file  dictionary. 

NAL  Hie  number  of  alpha,  beta,  and  mach  numbers,  respectively, 

NBE 

NMA  that  are  contained  in  the  present  table.  Computed  by  the 

program  fran  the  given  maximum,  minimum,  and  delta  values 
for  each  variable. 

E.  'System  Routines 

The  following  routines,  which  are  called  by  the  ACT  program,  are  available 
an  the  CDC  system's  library: 

NAME  DESCRIPTION 

CPENMS  Informs  the  operating  system  that  the  mass  storage  file 

will  be  a  randan  access  file. 
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READ6S 

SECOND 

WRI1MS 


1 


Transfers  data  frcin  mass  storage  to  central  memory. 
Gives  accumulated  central  processor  time. 

Transfers  data  fran  central  memory  to  mass  storage. 


A  more  caiplete  description  of  these  routines  can  be  found  in  Reference 
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III.  INPUT  GUIDE 

A.  I/O  Requirements 

The  input/output  requirements  of  this  program  require  that  the  following 
buffer  areas  be  reserved. 

FILE  NAME  DEFAULT  CONTENTS  FORMAT 

TAPE10/INPUT  Permanent  File/  Card  Images  Coded 

Card  Reader 

OUTPUT  Printer  Program  Output  Coded 

TAPE1  Local  Aerodynamic  Tables  Randcm,  Binary 

It  should  be  recognized  that  TAPEl  is  a  randan  file,  which  may  be 
saved  as  a  permanent  file  according  to  the  procedures  explained  in 
Reference  1. 

B.  Deck  Setup 

The  object  code  for  this  program  is  saved  as  a  permanent  file.  The 
program  may  be  referenced  under  the  filename  ACTBIN.  Loading  of  the 
program  requires  50K  octal  locations  of  core. 
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1.  Job  Control  for  creation  run. 

The  following  control  cards  (starting  in  column  1)  are  required  to 
execute  ACT  and  save  the  tables  that  are  created  and  stored  on  the 
randcm  file. 

CASE1.  If  input  data  is  fran  cards 
JCBNAME,CB50000  ,T10. 

ACCOUNT  ,NUMBER ,  PASSWORD . 

GET,L3Q=ACT3IN.  BINARY  OF  ACT 

LGO. 

SAVE  ,TAPE1=AER04 .  RANDOM  FILE  W/AERO.  COEF. 

7/  ) 

'8/.  MULTI-PUNCH 

9) 

DATA  CARDS 

6/7/0  .  |  MULTI-PUNCH 
8/9) 

CASE2.  If  input  data  is  fran  a  permanent  file. 
JCBNAME,CB50000,T10. 

ACCOUNT  DUMBER ,  PASSWORD . 

GET^jGO=ACTBIN. 

get  .cards. 

ZJ30  .CARDS, 

SAVE,TAPE1=AER04. 

6/7/q  .  \  MULTI-PUNCH 

8/9  j 
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Job  Control  for  Extend  Run. 

Using  the  files  created  in  the  creation  run,  the  following  control 
cards  are  necessary  to  add  or  replace  tables. 

This  setup  can  also  be  used  to  provide  only  a  listing  of  the  current 
tables. 

CASE1.  If  input  data  is  fran  cards 
JOBNAME , CB50000 , T10 . 

AGOOUNT ,  NUMBER,  PASSWORD . 

GET,  LGOACTBIN . 

GET,  TAPEl=AERQ4 . 

LUO. 

REPLACE , TAPE1=AER04 . 

7/  I 

V8/9  j  MULTI-PUNCH 
DATA  CARDS 

6/7/d  ,  |  MULTI-PUNCH 

°'9  j 

CASE2.  If  input  data  is  from  a  permanent  file. 

JOBNAME,  CB50000,T10. 

ACCOUNT,  NUMBER, PASSTORD . 

GET ,  LGOACTBIN . 

GET, TAFE1=AER04 . 

GET, CARDS. 

LGO, CARDS. 

REPLACE  t  TAPE1=AER04. 

6/7/fi /  !  MULTI-PUNCH 

°'9  ) 
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NOTE: 

If  the  "REPLACE”  card  is  not  included  in  the  above  example,  any  new  tables 
written  to  TAPE1  will  be  lost  when  the  program  ends.  The  "REPLACE"  card 
will  not  otherwise  affect  program  execution,  and  may  remain  in  the  deck 
even  if  no  new  tables  are  created. 

C.  Card  Input 
Card  Types 

The  following  are  the  five  different  card  types  that  are  recognized  by 
the  Act  Program.  Most  runs  will  only  require  a  subset  of  these,  and,  unless 
specified,  they  must  be  in  the  order  shown. 

All  integer  data  must  be  right  adjusted  in  their  appropriate  columns, 
while  all  alphanumeric  data  must  be  left  adjusted. 


CARD  TYPE  1 
FORMAT  COLUMNS 

15  1-5 


MNEMONIC  DESCRIPTION 

ITYPE  TYPE  OF  DATA 

=  1  TWO-WAY  DATA 
=  2  THREE-WAY  DATA 


15  6-10  MODE  TYPE  OF  RUN 

=  1  CREATION  RUN 
*  2  EXTENSION  RUN 
=  3  REPLACEMENT  RUN 
=  4  SHORT  LISTING 
=  5  LONG  LISTING 
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FORMAT 

COLUMNS 

MNEMONIC 

DESCRIPTION 

15 

11-15 

NOFTAB 

NUMBER  OF  TABLES  TO  BE  PROCESSED 

15 

16-20 

NTYP 

TYPE  OF  TWO-WAY  TABLE 

=  1  BETA  VS  MACH 
=  2  BETA  VS  ALPHA 
=  3  ALPHA  VS  MACH 
(DEFAULT  IS  NTYP  =  1) 

NOTE:  ON  A  LIST  RUN  (MODE  =  +  OR  5)  ,  "NOFTAB"  AND  "NTYP"  DO  NOT  HAVE 
TO  BE  DEFINED. 

CARD  TYPE  2 


FORMAT 

COLUMNS 

MNEMONIC 

DESCRIPTION 

8A10 

1-80 

FMT 

THE  FORMAT  UNDER  WHICH  THE  COEFFICIENTS 

WILL  HE  READ 

NOTE: 

CARD  TYPES  3, 

4,  AND  5  MUST  BE  REPEATED,  IN  SEQUENCE,  "NOETAB" 

TIMES. 

CARD  TYPE  3 

FORMAT 

COLUMNS 

MNEMONIC 

DESCRIPTION 

A10 

1-10 

IDENT 

TABLE  NAME 

15 

11-15 

NCOEF 

NUMBER  OF  COEFFICIENTS 

15 

16-20 

ISEQNO 

SEQUENCE  NUMBER  OF  THE  TABLE  TO  BE 

REPLACED  (WHEN  MODE  ®  3) 
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CARD  TYPE  4 


FORMAT 

F8.0 

COLUMNS 

1-8 

MNEMONIC 

AIKEN 

description 

minimum  ALPHA 

F8.0 

9-16 

ALMAX 

maximum  alpha 

F8.0 

17-24 

DELALP 

delta  alpha 

F8.0 

25-32 

BEMIN 

minimum  beta 

FS.O 

33-40 

BEMAX 

maximum  beta 

F8.0 

41-48 

DELEET 

delta  beta 

F8.0 

49-56 

MAMIN 

MINIMUM  MACH 

F8.0 

57-64 

MAMAX 

MAXIMUM  MACH 

F8.0 

65-72 

DELMAC 

DELTA  MACH 

WHEN  ITYPE  =  1  : 

FORMAT  COLUMNS 

mnemonic 

DESCRIPTION 

NTYP=1  NTYPs=2 

NTYP=3 

18.0 

25-32 

BEMIN 

MIN.  BETA 

min.  beta 

MIN.  ALPHA 

F8.0 

33-40 

BEMAX 

MAX.  BETA 

MAX.  BETA 

MAX.  ALPHA 

F8.0 

41-48 

DEIBET 

DELTA  BETA 

delta  BETA 

DELTA  ALPHA 

F8.0 

49-56 

MAMIN 

MIN.  MACH 

MIN.  ALPHA 

MIN.  MACH 
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FORMAT 

COLUMNS 

MNEMONIC 

DESCRIPTION 

F8.0 

57-64 

MAMAX 

MAX.  MACH 

MAX.  ALPHA 

MAX.  MACH 

F8.0 

65-72 

DELMAC 

DELTA  MACH 

DELTA  ALPHA 

DELTA  MACH 

CARD  TYPE  5 
FORMAT  COLUMNS 
SPECIFIED  BY  THE  USER 
IN  CARD  TYPE  2. 

NOTE:  SEE  SECTION  II  .A  FOR  A  FURTHER  DESCRIPTION  CF  HCW  THE  TABLE  COEF¬ 
FICIENTS  MUST  EE  READ  IN. 

D.  Types  of  errors  that  can  be  found. 

#  1  Number  of  tables  greater  than  50. 

#  2  Number  of  coefficients  greater  than  500. 

#  3  Invalid  use  of  replace  mode. 

#  4  Read  excess  tables  into  dunmy. 

#  5  Two-way  tables  fully  extended. 

#  6  Attempt  to  extend  two-way  tables  beyond  30. 

#  7  Three-way  tables  fully  extended. 

#  8  Attempt  to  extend  three-way  tables  beyond  20. 

#  9  Error  in  number  of  coefficients  defined. 

Hie  Act  Program  provides  a  method  of  continuing  execution  of  the  program, 
despite  the  discovery  of  an  input  error.  The  user  is  informed  of  the 
error  that  has  been  found,  which  will  enable  him  to  correct  it  in  a  later 


DESCRIPTION 
TABLE  COEFFICIENTS 
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run.  In  cases  where  a  serious  error  causes  the  program  to  end,  the  info 
array  for  all  previously  created  tables  is  written  to  the  random  file. 

Under  a  "LIST"  run  (mode  =  4  or  5) ,  only  card  type  1  is  recognized. 

* 

For  all  other  runs,  all  five  card  types  are  required.  After  each  set 
of  input  is  processed,  the  next  card  type  1  is  read.  Hie  program  will 
terminate  upon  reading  an  end  of  information  card. 

The  program  is  designed  to  check  for  obvious  input  errors,  and  make 
the  appropriate  adjustments  to  compensate  for  them.  The  subroutine 
ERMSG  handles  the  printing  of  the  error  messages,  which  indicate  the 
source  of  the  error  and  the  action  that  will  be  taken  by  the  program. 

An  attempt  is  always  made  to  save  the  "INFO"  array  before  terminating 
the  program  due  to  an  input  error. 

On  the  following  pages  is  a  sample  of  the  inputs  needed. 
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SAMPLE  INPUT 


***  CATALOG  RUN  *** 


113  3 

(14F5.1) 

CXS  95 


0. 

360.  20.  0. 

1.2 

.3 

-1.0  -0.8  -0.4  -0.2  0.0 

0.2 

0.4  0.8 

1.0  0.8 

0.7 

0.6 

0.4 

0.0 

-0.4  -0.6  -0.8  -0.9  -1.0 
-1.0  -0.8  -0.4  -0.2  0.0 

0.2 

0.4  0.8 

1.0  0.8 

0.7 

0.6 

0.4 

0.0 

-0.4  -0.6  -0.8  -0.9  -1.0 
-1.0  -0.8  -0.4  -0.2  0.0 

0.2 

0.4  0.8 

1.0  0.8 

0.7 

0.6 

0.4 

0.0 

-0.4  -0.6  -0.8  -0.9  -1.0 
-1.2  -1.0  -0.6  -0.2  0.2 

0.3 

0.6  0.9 

1.0  0.9 

0.7 

0.6 

0.4 

0.0 

-0.4  -0.8  -1.0  -1.2  -1.2 
-1.3  -1.0  -0.7  -0.2  0.0 
-0.4  -0.9  -1.1  -1.2  -1.2 
CZS  95 

0.2 

0.5  1.0 

1.2  1.0 

0.8 

0.6 

0.4 

0.2 

0. 

360.  20.  0. 

1.2 

.3 

0.3  0.0  -0.4  -0.5  -0.6 
0.5  0.6  0.5  0.4  0.3 

-0.7  - 

-0.8  -0.7  ■ 

-0.4  -0.2 

0.0 

0.0 

0.3 

0.4 

0.3  0.0  -0.4  -0.5  -0.6 
0.5  0.6  0.5  0.4  0.3 

-0.7  ■ 

-0.8  -0.7  ■ 

-0.4  -0.2 

0.0 

0.0 

0.3 

0.4 

0.3  0.0  -0.4  -0.5  -0.6 
0.5  0.6  0.5  0.4  0.3 

-0.7  ■ 

-0.8  -0.7 

-0.4  -0.2 

0.0 

0.0 

0.3 

0.4 

0.4  0.0  -0.4  -0.6  -0.6 

-0.8  -0.7  -0.4 

0.0  0.1 

0.0 

0.1 

0.2 

0.4 

0.6  0.5  0.6  0.4  0.2 

0.1  0.0  -0.4  -0.7  -0.8 

-0.8  -0.9  -0.8  -0.5  -0.2 

0.0 

0.2 

0.4 

0.4 

0.6  0.7  0.6  0.5  0.3 
CMS  95 

0. 

360. 

20.  0. 

1.2 

.3 

-0.10-0.05  0.00  0.10  0.15 

0.15 

0.15  0.10 

0.19-0.08- 

-0.10 

-0.10- 

-0.10- 

-0.02 

0.0  0.05  0.0  -0.05-0.10 
-0.10-0.05  0.00  0.10  0.15 

0.15 

0.15  0.10 

0.19-0.08- 

-0.10 

-0.10- 

-0.10- 

-0.02 

0.0  0.05  0.0  -0.05-0.10 

-0.10-0.05  0.00  0.10  0.15 

0.15 

0.15  0.10 

0.19-0.08- 

-0.10 

-0.10-0.10- 

-0.02 

0.0  0.05  0.0  -0.05-0.10 
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-0-15-0.10  0.0  0.10  0.15  0.17  0.13  0.10  0.05  0.50  0.10  0.15  0.10  0.05 
0.0  0.90  0.0  0.90-0.15 

0.15-0.05  0-0  0.13  0.15  0.19  0.18  0.10  0.05-0.05-0.13-0.18-0.10-0.02 
0.0  0.0  0.02-0.10-0.15 


***  EXTEND  HJN  *** 


12  2  1 

(14F5.1) 

CYS  50 

0.  45.  5.  0.  1.2  .3 

0. 0-0. 10-0. 15-0 . 30-0 . 35-0 . 50-0 . 60-0 . 70-0 . 85-1.00 
0. 0-0.10-0. 15-0.30-0. 35-0. 50-0. 60-0.70-0.85-1.00 
0. 0-0. 10-0. 15-0.30-0. 35-0.50-0. 60-0. 70-0. 85-1. 00 
0. 0-0.10-0 . 20-0. 40-0. 50-0 .60-0.80-0. 90-1 . 00-1.20 
0. 0-0.10-0.30-0. 50-0.60-0. 80-0. 90-1.10-1.20-1.40 
05  50 

0.  45.  5.  0.  1.2  .3 

0.0+0. 01+0 .02+0.04+0.05+0. 07+0 .09+0.09+0.09+0.08 
0.0+0. 01+0 . 02+0 . 04+0 . 05+0 . 07+0 . 09+0 .09+0.09+0.08 
0.0  +0,01+0.02+0. 04+0 . 05+0 . 07+0 . 09+0 . 09+0. 09+0 . 08 
0. 0  +0. 01+0. 02+0, 04+0. 05+0.07+0. 09+0.09+0. 09+0.08 
0.0  +0.01+0.02+0.04+0.05+0. 07+0 .09+0.09+0.09+0.08 
13  11 

(14F5.1) 

CMS  50  23 

0.  45.  5.  0.  1.2  .3 

0.9-0.01-0.03-0.05-0.07-0.08-0.10-0.12-0.13-0.14 
0.0-0.01-0.03-0. 05-0 .07-0.08-0. 10-0 . 12-0 . 13-0 . 14 
0. 0-0. 01-0.03-0. 05-0 . 07-0. 08-0.10-0 . 12-0.13-0.14 
0.9-0. 01-0 . 03-0 . 05-0 . 06-0 . 10-0 . 12-0 . 13-0 . 14-0 . 15 
0. 0-0.02-0.03-0. 05-0.08-0.10-0 . 12-0.13-0 . 14-0 . 15 
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INC jL 

1.  Control  Data  Cyber  70  Series  Modes  72/73/74  6000  Series  Computer 
Systems  KRDNOS  2.1  Reference  Manual.  Publication  Number  60407000. 

2.  NADC  Central  Ccnputer  System  CDC  Cyber  760/Cyber  175/6000S 
Users  Manual.  (Ccnputer  Dept.  Tech.  Memorandum  85-7807) . 

3.  Reynolds,  John  H. ,  "A  CDC  6700  Computer  Program  for  Generating 
Random  Files  of  Equally  Spaced  Tables  for  Observed  Weather  Data," 
NWL  Technical  Note  TN-K-2/72,  Naval  Weapons  laboratory,  Dahlgren, 
Virginia,  January,  1972. 

4.  Control  Data  6000  Ccnputer  Systems  "Fortran  Extended  3.0  Reference 
Manual,"  Publication  Number  60176600,  Control  Data  Corporation, 
October  1971. 

5.  ACT,  A  CDC  6700  Ccnputer  Program  for  Generating  Random  Files  of 
Aerodynamic  Coefficient  Tables  Technical  Note  TN-K-1/74,  Naval 
Weapons  Laboratory,  Dahlgren,  Virginia,  January,  1974. 

6.  White,.  B.J,  "Aercmechanical  Properties  of  Ejection  Seat  Escape 
Systems",  Technical  Report  AFFDL-TR-74-57,  Air  Force  Flight 
Dynamics  Laboratory,  Wright-Patterson  Air  Force  Base,  Ohio, 

April,  1974. 
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APPENDIX  E 


FORTRAN  LISTING  OF  THE  ACT  PROGRAM 
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PPOCkAH  ttHGTH  263m  17\ 

CM  CAUEttO  COMMOrj  LENGTH  52*>H  336 


